home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 51 / Mac Magazin and MacEasy Magazine CD - Issue 51.iso / Software / Grafik / Geo3D 1.1.1 ƒ / ScriptAnimation < prev    next >
Text File  |  1998-10-13  |  255b  |  15 lines
  1. -- Geo3D
  2. -- Test Animation
  3.  
  4. tell application "Geo3D"
  5.     activate
  6.     make new document
  7.     set x to import animation from file "Demo.geo"
  8.         if x > 0 then -- 0: error
  9.             play
  10.             repeat with x from 1 to x -- slower
  11.                 go to frame x
  12.             end repeat
  13.         end if
  14. end tell
  15.